Hacker 5/HACKER05.ISO/Sucelje.cst/00057_Script_Media Preload

Text File | 1998-03-04 | 7KB | 201 lines

-- Media Preload

-- on prepareframe or mouseup
-- load frames, members, a movie, or all frames and members,
-- if not ready, goes to the current frame - allows animated cursor or other behaviors to
-- happen

property tracking   -- 0 haven't started, 1 in progress, 2 done
property whichEvent

property allmembers
property framerange
property StartFrame
property EndFrame
property memberrange
property StartMember
property EndMember
property amovie
property moviename
property preloadID
property netaware

property gettingall       -- 0 if not started, 1 if started, 2 if finished
property gettingframes
property gettingmembers
property gettingmovie
-- will loop on the current frame while preloading is happening

on beginsprite me
  set gettingall = 0
  set gettingframes = 0
  set gettingmembers = 0
  set gettingmovie = 0
end

on init me
  if tracking <> 2 then set tracking = TRUE
  do_it
end

on do_it me
  if tracking then
    if (allmembers = TRUE and gettingall <> 2 ) and ¼
       (framerange= TRUE and gettingframes <> 2 ) and ¼
       (memberrange= TRUE and gettingmembers <> 2 ) and ¼
       (amovie = TRUE and gettingmovie <> 2 ) then

      if netaware then
        if allmembers then
          if not frameready() then go the frame
          if gettingall = 0 then
            set gettingall = 1
            preload
            set gettingall = 2
          end if
        end if

        if framerange then
          if not frameready (startframe, endframe) then go the frame
          if gettingframes = 0 then
            set gettingframes = 1
            preload startframe, endframe
            set gettingframes = 2
          end if
        end if

        if memberrange then
          if not mediaready (startMember, endMember) then go the frame
          if gettingmembers = 0 then
            set gettingmembers = 1
            preloadMember startMember, endMember
            set gettingmembers = 2
          end if
        end if

        if amovie then
          if gettingmovie = 0 then
            set preloadID = preloadnetthing (moviename)  -- ask Chris about this part
            set gettingmovie = 1
          end if

          if not netDone(preloadID) then go the frame  --netdoneID

          preLoadMovie moviename
          set gettingmovie = 2

        end if
      else -- end netaware
        if allmembers then
          if gettingall = 0 then
            set gettingall = 1
            preload
            set gettingall = 2
          end if
        end if

        if framerange then
          if gettingframes = 0 then
            set gettingframes = 1
            preload startframe, endframe
            set gettingframes = 2
          end if
        end if

        if memberrange then
          if gettingmembers = 0 then
            set gettingmembers = 1
            preloadMember startMember, endMember
            set gettingmembers = 2
          end if
        end if

        if amovie then
          if gettingmovie = 0 then
            set gettingmovie = 1
            preLoadMovie moviename
            set gettingmovie = 2
          end if
        end if

      end if -- end not netaware

    else -- check for everything done
      set tracking = 2
    end if

  end if  -- end tracking

end


on initPreLoad me
  init me
end

on mouseUp me
  if whichEvent = #mouseup    then init me
end

on prepareFrame me
  if whichEvent = #prepareframe then init me
end



---

on getPropertyDescriptionList

  set p_list = [ ¼
    #whichEvent: [ #comment:   "Initializing Event:", ¼
                    #format:   #symbol, ¼
                     #range: [ #MouseUp, #MouseDown, #PrepareFrame,#EnterFrame, #ExitFrame], ¼
                   #default:   #MouseUp ],¼
     #allmembers: [ #comment:  "All Members:", ¼
                    #format:   #boolean, ¼
                   #default:    0 ], ¼
   #framerange:  [ #comment:   "Frame Range:", ¼
                    #format:   #boolean, ¼
                   #default:    0 ], ¼
    #StartFrame: [ #comment:   "Start Frame:", ¼
                    #format:   #integer, ¼
                   #default:   0 ], ¼
      #EndFrame: [ #comment:   "End Frame:", ¼
                    #format:   #integer, ¼
                   #default:   0 ], ¼
 #memberrange:   [ #comment:   "Member Range:", ¼
                    #format:   #boolean, ¼
                   #default:    0 ], ¼
    #StartMember: [ #comment:   "Start Member:", ¼
                    #format:   #member, ¼
                   #default:   member 1 ], ¼
      #EndMember: [ #comment:   "End Member:", ¼
                    #format:   #member, ¼
                   #default:   member 1 ], ¼
        #amovie: [ #comment:   "Preload Movie:", ¼
                    #format:   #boolean, ¼
                   #default:    0 ], ¼
     #moviename: [ #comment:   "Movie Name:", ¼
                    #format:   #string, ¼
                   #default:   "" ], ¼
      #netaware: [ #comment:   "Internet Aware:", ¼
                    #format:   #boolean, ¼
                   #default:    0 ] ¼
  ]
  return p_list

end

on getBehaviorDescription
  return ¼
"Loads cast members into RAM so they are instantly available to the movie. Define what to preload by specifying a range of cast members in a cast or frames in the score. The behavior can also load all the cast members in a different movie. If the Internet Aware parameter is turned on, the behavior checks the network cache to make sure the media is on the local disk before it is loaded into RAM.  "& RETURN & ¼
"PARAMETERS:" & RETURN & ¼
"ò Initializing Event - Specify the event that triggers the behavior. & RETURN & ¼
"ò All Members - Choose this option to load all cast members in the current movie starting at the current frame."  & RETURN & ¼
"ò Frame Range - Turn this option on and define a range of frames to load. Enter the start and end frames of the range in the appropriate boxes."  & RETURN & ¼
"ò Member Range  - Turn this option on and define a range of cast members within a cast. Choose the first and last cast members to load from the pop-ups."  & RETURN & ¼
"ò Preload Movie - Turn this option on and enter the name of a Director movie in Movie Name. All the cast members in the movie are loaded. Use this parameter to reduce delays when switching to a different movie." & RETURN & ¼
"ò Internet Aware - Turn this option on to make Director check the network cache to make sure the media is on the local disk before preloading."
end